Kaleidoscope by François Vander Linden

This is my first entry for Roby's Fancy Screen Stuff contest.
I know the code will not win because it's not that "fancy" and that it must have been done before but it's there because it's the shortest code I know that can provide some sort of kaleidoscope effect or simply test if you're prone to epilepsy ...
In fact, here's a side challenge to the contest: who can write a shorter program for Roby's contest ? This one is 37 characters.

0HGR:POKE28,RND(1)*256:CALL-3082:GOTO
Here's the 2-line variation that prevents the HGR at every cycle: 39 characters.
0HGR
1POKE28,RND(1)*256:CALL-3082:GOTO1
And the one line version with HGR skipped using the POKE 184 trick: 42 characters
0HGR:POKE28,RND(1)*256:CALL-3082:POKE184,6
And here's a sequential variation in 46 chars:
0HGR:FORI=0TO255:POKE28,I:CALL-3082:NEXT:GOTO